/*
 * Copyright (C) 2010 Fores Inc.
 *
 * Licensed under the Apache License, Version 2.0 (the "License");
 * you may not use this file except in compliance with the License.
 * You may obtain a copy of the License at
 *
 * http://www.apache.org/licenses/LICENSE-2.0
 *
 * Unless required by applicable law or agreed to in writing, software
 * distributed under the License is distributed on an "AS IS" BASIS,
 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 * See the License for the specific language governing permissions and
 * limitations under the License.
 */

package jp.fores.midori.xmlrpc;

import java.util.HashMap;
import java.util.Map;

import javax.xml.namespace.QName;

import org.xml.sax.Attributes;
import org.xml.sax.SAXException;
import org.xml.sax.SAXParseException;


/**
 * XML-RPCの「struct」タグを解析するためのクラス。<br>
 * (このクラスはスレッドセーフではありません。)<br>
 * (ライブラリの使用者には公開したくない内部処理用のクラスなので、あえてパッケージスコープにしています。)<br>
 */
class StructParser extends AbstractRecursiveTypeParserImpl {
	//==========================================================
	//フィールド

	/**
	 * 結果を格納するMap
	 */
	private final Map<String, Object> map = new HashMap<String, Object>();

	/**
	 * 「name」タグの内容を格納するためのStringBuilder
	 */
	private StringBuilder nameSb = null;

	/**
	 * 「value」タグの処理結果のオブジェクト
	 */
	private Object valueObject = null;

	/**
	 * 「name」タグの処理中かどうかのフラグ
	 */
	private boolean inNameTag = false;

	/**
	 * 「value」タグの処理中かどうかのフラグ
	 */
	private boolean inValueTag = false;

	/**
	 * 「name」タグの処理が完了したかどうかのフラグ
	 */
	private boolean doneNameTag = false;

	/**
	 * 「value」タグの処理が完了したかどうかのフラグ
	 */
	private boolean doneValueTag = false;


	//==========================================================
	//メソッド

	//_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/
	//抽象メソッドの実装

	/**
	 * 結果のオブジェクトを追加します。<br>
	 *
	 * @param obj 結果のオブジェクト
	 * @throws SAXException SAX例外
	 */
	@Override
	protected void addResult(Object obj) throws SAXException {
		//引数のオブジェクトを、フィールドの「value」タグの処理結果のオブジェクトに設定する
		this.valueObject = obj;
	}


	//_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/
	//オーバーライドするメソッド

	/**
	 * 要素の開始通知を受け取ります。<br>
	 *
	 * @param uri 名前空間URI
	 * @param localName 前置修飾子を含まないローカル名
	 * @param qName 接頭辞を持つ修飾名
	 * @param attributes 要素に付加された属性
	 * @throws SAXException SAX例外
	 */
	@Override
	public void startElement(String uri, String localName, String qName,
			Attributes attributes) throws SAXException {
		//タグの階層レベルを+1する
		this.level++;

		//階層レベルが1の場合
		if (this.level == 1) {
			//名前空間URIの指定無しの「struct」タグ以外の場合
			if (!(isBlank(uri) && "struct".equals(localName))) {
				//例外を投げる
				throw new SAXParseException("「struct」タグが開始されるべきところで、別のタグが開始されました。"
						+ new QName(uri, localName), getDocumentLocator());
			}
		}
		//階層レベルが2の場合
		else if (this.level == 2) {
			//名前空間URIの指定無しの「member」タグ以外の場合
			if (!(isBlank(uri) && "member".equals(localName))) {
				//例外を投げる
				throw new SAXParseException("「member」タグが開始されるべきところで、別のタグが開始されました。"
						+ new QName(uri, localName), getDocumentLocator());
			}
		}
		//階層レベルが3の場合
		//(この階層には「name」タグと「value」タグがそれぞれ1つずつ含まれていなければならない)
		else if (this.level == 3) {
			//名前空間URIの指定無しの「name」タグ、または「value」タグ以外の場合
			if (!(isBlank(uri) && ("name".equals(localName) || "value".equals(localName)))) {
				//例外を投げる
				throw new SAXParseException("「name」タグ、または「value」タグが開始されるべきところで、別のタグが開始されました。"
						+ new QName(uri, localName), getDocumentLocator());
			}

			//「name」タグの場合
			if ("name".equals(localName)) {
				//「name」タグの処理が完了したかどうかのフラグがたっている場合
				//(同じ「member」タグの中で、すでに別の「name」タグが開始されていた場合)
				if (this.doneNameTag) {
					//例外を投げる
					throw new SAXParseException("1つの「member」タグの中に、複数の「name」タグを含めることはできません。"
							+ new QName(uri, localName), getDocumentLocator());
				}

				//「name」タグの処理中かどうかのフラグをたてる
				this.inNameTag = true;

				//「name」タグの内容を格納するためのStringBuilderのインスタンスを生成する
				this.nameSb = new StringBuilder();
			}
			//「value」タグの場合
			else if ("value".equals(localName)) {
				//「value」タグの処理が完了したかどうかのフラグがたっている場合
				//(同じ「member」タグの中で、すでに別の「value」タグが開始されていた場合)
				if (this.doneValueTag) {
					//例外を投げる
					throw new SAXParseException("1つの「member」タグの中に、複数の「value」タグを含めることはできません。"
							+ new QName(uri, localName), getDocumentLocator());
				}

				//「value」タグの処理中かどうかのフラグをたてる
				this.inValueTag = true;

				//「value」タグの開始時の処理を呼び出す
				startValueTag();
			}
		}
		//それ以外の場合
		else {
			//親クラスの処理を呼び出す
			super.startElement(uri, localName, qName, attributes);
		}
	}

	/**
	 * 要素の終了通知を受け取ります。<br>
	 *
	 * @param uri 名前空間URI
	 * @param localName 前置修飾子を含まないローカル名
	 * @param qName 接頭辞を持つ修飾名
	 * @throws SAXException SAX例外
	 */
	@Override
	public void endElement(String uri, String localName, String qName)
			throws SAXException {
		//階層レベルが1の場合
		if (this.level == 1) {
			//名前空間URIの指定無しの「struct」タグ以外の場合
			if (!(isBlank(uri) && "struct".equals(localName))) {
				//例外を投げる
				throw new SAXParseException("「struct」タグが終了されるべきところで、別のタグが終了されました。"
						+ new QName(uri, localName), getDocumentLocator());
			}

			//フィールドのMapを結果のオブジェクトとして設定する
			setResult(this.map);
		}
		//階層レベルが2の場合
		else if (this.level == 2) {
			//==========================================================
			//タグの整合性チェック

			//名前空間URIの指定無しの「member」タグ以外の場合
			if (!(isBlank(uri) && "member".equals(localName))) {
				//例外を投げる
				throw new SAXParseException("「member」タグが終了されるべきところで、別のタグが終了されました。"
						+ new QName(uri, localName), getDocumentLocator());
			}

			//「name」タグの処理が完了したかどうかのフラグがたっていない場合
			if (!this.doneNameTag) {
				//例外を投げる
				throw new SAXParseException("「member」タグの中に「name」タグが含まれていませんでした。"
						+ new QName(uri, localName), getDocumentLocator());
			}

			//「value」タグの処理が完了したかどうかのフラグがたっていない場合
			if (!this.doneValueTag) {
				//例外を投げる
				throw new SAXParseException("「member」タグの中に「value」タグが含まれていませんでした。"
						+ new QName(uri, localName), getDocumentLocator());
			}


			//==========================================================
			//「name」タグと「value」タグの内容をMapに登録する

			//「name」タグの内容を文字列として取得
			String name = this.nameSb.toString();

			//「name」タグの内容と同じキーのデータがすでにMapに登録されている場合
			if (this.map.containsKey(name)) {
				//例外を投げる
				throw new SAXParseException("「name」タグの内容が重複しています。 :" + name
						+ new QName(uri, localName), getDocumentLocator());
			}

			//キーに「name」タグの内容、値に「value」タグの処理結果のオブジェクトを指定して、Mapに登録する
			this.map.put(name, this.valueObject);


			//==========================================================
			//フィールドの状態を元に戻す

			//「name」タグの内容を格納するためのStringBuilderをnullに戻す
			this.nameSb = null;

			//「value」タグの処理結果のオブジェクトをnullに戻す
			this.valueObject = null;

			//「name」タグの処理が完了したかどうかのフラグをfalseに戻す
			this.doneNameTag = false;

			//「value」タグの処理が完了したかどうかのフラグをfalseに戻す
			this.doneValueTag = false;
		}
		//階層レベルが3の場合
		//(この階層には「name」タグと「value」タグがそれぞれ1つずつ含まれていなければならない)
		else if (this.level == 3) {
			//名前空間URIの指定無しの「name」タグで、かつ「name」タグの内容を格納するためのStringBuilderがnullでない場合
			if (isBlank(uri) && "name".equals(localName)
					&& (this.nameSb != null)) {
				//「name」タグの処理中かどうかのフラグをfalseに戻す
				this.inNameTag = false;

				//「name」タグの処理が完了したかどうかのフラグをたてる
				this.doneNameTag = true;
			}
			//名前空間URIの指定無しの「value」タグで、かつ「value」タグの処理中かどうかのフラグがたっている場合
			else if (isBlank(uri) && "value".equals(localName)
					&& this.inValueTag) {
				//「value」タグの処理中かどうかのフラグをfalseに戻す
				this.inValueTag = false;

				//「value」タグの処理が完了したかどうかのフラグをたてる
				this.doneValueTag = true;

				//「value」タグの終了時の処理を呼び出す
				endValueTag();
			}
			//それ以外の場合
			else {
				//ここに到達するのは不正な場合なので、例外を投げる
				throw new SAXParseException("「タグの階層構造が不正です。"
						+ new QName(uri, localName), getDocumentLocator());
			}
		}
		//それ以外の場合
		else {
			//親クラスの処理を呼び出す
			super.endElement(uri, localName, qName);
		}

		//タグの階層レベルを-1する
		this.level--;
	}

	/**
	 * 要素内の文字データの通知を受け取ります。<br>
	 * このクラスの実装では、文字配列の使用範囲に空白文字以外が含まれている場合は例外を投げます。<br>
	 *
	 * @param ch 文字配列
	 * @param start 文字配列内の開始位置
	 * @param length 文字配列から使用される文字数
	 * @throws SAXException SAX例外
	 */
	@Override
	public void characters(char[] ch, int start, int length)
			throws SAXException {
		//「name」タグの処理中かどうかのフラグがたっている場合
		if (this.inNameTag) {
			//文字配列の使用範囲を「name」タグの内容を格納するためのStringBuilderに追加する
			this.nameSb.append(ch, start, length);
		}
		//それ以外の場合
		else {
			//親クラスの処理を呼び出す
			super.characters(ch, start, length);
		}
	}

	/**
	 * 要素内の文字データの通知を受け取ります。<br>
	 * このクラスの実装では、文字配列の使用範囲に空白文字以外が含まれている場合は例外を投げます。<br>
	 *
	 * @param ch 文字配列
	 * @param start 文字配列内の開始位置
	 * @param length 文字配列から使用される文字数
	 * @throws SAXException SAX例外
	 */
	//	@Override
	//	public void ignorableWhitespace(char[] ch, int start, int length)
	//			throws SAXException {
	//		//「name」タグの内容を格納するためのStringBuilderがnullでない場合
	//		//(「name」タグの処理中の場合)
	//		if (this.nameSb != null) {
	//			//文字配列の使用範囲を「name」タグの内容を格納するためのStringBuilderに追加する
	//			this.nameSb.append(ch, start, length);
	//		}
	//		//それ以外の場合
	//		else {
	//			//親クラスの処理を呼び出す
	//			super.ignorableWhitespace(ch, start, length);
	//		}
	//	}
}
